1130 IFA=OP%ANDA<>VAL(T$)THENVS=.
10232 DIMD(11),H$(11):FORI=.TO9:INPUT#8,D(I),H$(I):NEXT:D(10)=8
12091 GOSUB26210:OV=2:GOTO97
12092 GOSUB29010:TI$="000000":IFSC<0THEN12010
13020 IFA=>OP%ANDA<=CL%THEN13040
13040 FORI=1TONN%:IFN%(I)THEN13060
13050 NEXT:RETURN